home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / mint / lib / mntc6846.zoo / patch / sftst.s < prev    next >
Encoding:
Text File  |  1994-11-14  |  529 b   |  18 lines
  1.  ! C68 4 byte floating point routine to test zero
  2.  !-----------------------------------------------------------------------------
  3.  !  #1    First version            Dave and Keith Walker        08/92
  4.  !  #2  Changed entry/exit code for C68 v4.3 compatibility    -djw-    09/93
  5.  !-----------------------------------------------------------------------------
  6.  
  7.     .sect .text
  8.     .define    .Xsftst
  9.  
  10. .Xsftst:
  11.     move.l    4(sp),a0        ! pointer to value
  12.     tst.l    (a0)            ! test it
  13.     move.l    (sp)+,a0        ! get return address
  14.  
  15.     add.l    #4,sp            ! collapse stack
  16.     jmp    (a0)            ! return
  17.  
  18.